home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Archives / Replacements / AKCC35.lha / Programmers / Basic / WildCard.bas < prev   
Encoding:
BASIC Source File  |  1994-12-30  |  292 b   |  17 lines
  1.  
  2.  REM $VER: WildCard.bas V37.3 (25.7.94)
  3.  
  4.  DECLARE FUNCTION AKCCWildCmp% LIBRARY
  5.  
  6.  LIBRARY "akcc_gen0.library"
  7.  
  8.   flag% = AKCCWildCmp%(SADD("OrigString"+CHR$(0)),SADD("Orig*"+CHR$(0)))
  9.  
  10.   IF flag%=1 THEN
  11.          PRINT "WildCard fits !"
  12.         ELSE
  13.          PRINT "WildCard does not match !"
  14.   END IF
  15.  
  16. END
  17.